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A Call for ZBasic 

General Purpose 

Subroutines 



Many of us would like to 
obtain Public Domain ZBasic 
routines so you don't have to re- 
create the wheel every time you 
write a program. Can you 
imagine the time it would save? 

continued page 19 



ZBasic Inventor 




Andrew Gariepy, President 

As most of you know, Andrew 
Gariepy created the first 
version on a TRS-80 computer, 
back in 1979. Since then it has 
developed into 

continued on page 7 



Upgrades 



Zedcor offers upgrades to users 
at a surprisingly fair price. 

The latest release of the various 
versions of ZBasic and the 
reference manual is: 

Amstrad (CP/M) 3.1 

Apple II DOS 3.3 3.11 

CPIM-80™ 3.1 

Kaypro® Graphics 3.1 

MSDOS™IIBMPC 3.02 

Macintosh™ 3.03 

TRS-80™ (U and 4) 3.1 

ZBasic Manual: 3rd Edition 

Since ZBasic is a living, 
growing language, there will 
always be enhancements, bug 
fixes and improvements. 

Customer suggestions are 

continued on page 15 
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This newsletter is for people 
that use Zedcor's BASIC 
Compiler. ZBasic operates on 
many computers including; 
IBM PC's, Macintoshes, 
Apple //s, CP/M machines and 
more. 

"Z" is also the result of 
hundreds of requests from 
ZBasic users. 

It is an efficient way to 
distribute important information 
to programmers including: 

• The latest Upgrade notices 

• Programming tricks 

• Fixes and Patches 

• Program Examples 

• The latest from Zedcor 

• Program announcements 

• Dear Dr. Z column 

• Technical Support notes 

• User Forum 

• Notes from the Developers 

continued on page 9 
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Apple // 
Notes 

Apple® He, lie, 11+ 

The latest version of ZBasic for DOS 3.3 is 
3.11. What's been fixed? There were some 
problems with Chaining, CLEAR END, 
CIRCLE PLOT, CIRCLE FILL and BOX FILL 
and a couple of other minor things. 



To check your version; 



continued page 4 







Z80 
Notes 

CP/M™ and TRS-80™ Computers 

The Z80 versions of ZBasic are the oldest. 
Andrew Gariepy created the original ZBasic on 
an old TRS-80 model one computer back in 
1979. At the time it was just for fun, but over 
the years it became a serious business. Although 
Z80 computers are falling out of favor lately, we 
will continue to support them with 

continued on page 6 



Support Notes 

by David Lewis, Zedcor Technical 
Support Group 

I've been programming with 
ZBasic for some time now and 
in my opinion it is the fastest, 
most versitile compiler on the 
market. It does, however, 
have its complexities (that's 
why I have this job). 

I remember when support 
questions were easy; like 
"How do I save in ASCII?" 

Lately I get more sophisticated 
questions like; "I'm converting 
a program over from MSBasic. 
It is 97K in length and it bombs 
when I compile it". Being a 
programmer, I'm sure you can 
appreciate my delima and 
understand why I would have 
no problem answering the first 
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diskette with the problem 
program and a listing of the 
area where you are having a 
problem. I also need to know 
what computer you are using 

(remember ZBasic is available for many 
machines). 



question over the phone and 
request the second user to send 
me more information by mail. 

Most questions can be handled 
by phone but when it involves 
examining code and program 
logic of any considerable size, 
phone support is not feasible. 
In this case please submit a 



If security is a problem only 
submit that part of the code that 
is giving you a problem. 

If you have any support 
questions or need help with a 
complex part of ZBasic, feel 
free to call me; 1 1AM to 5PM 
Mountain Standard Time. 
That's two hours behind the 
East coast and the same as the 
West coast except during 
daylight savings time when 
there is an extra hour difference 
(Arizona doesn't observe 
daylight savings time). 

D.L. 
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1BM-MSD0S 
Notes 

IBM® PC and MSDOS™ compatibles 

This version of ZBasic continues to be the hottest 
seller. 

This column is packed with information. Please 
submit any programs you have for IBM PC or 
MSDOS machines so we can include them in 
future newsletters. Your help is appreciated. 

The subroutines included in this column may be 
used freely in your programs or be passed out to 
your friends since they are Public Domain (this 
does not mean that you can sell them for profit 
unless you get the authors permission). 

Update Information 

The latest release of the MSDOS version of 
ZBasic is 3.02, dated March, 1986. There have 
been lots of things added since version 3.01 so 
be sure to upgrade: 

• EOF function 

• Page flipping 

• Functions for BLOAD, BSAVE, CALL etc. 

• Bug fixes 

• More OPEN"C" support 

• Misc. other fixes and additions 



BASICAto ZBasic Conversion Program 

Zedcor has a BASICA (and GW Basic™) to 
ZBasic conversion program available for $29.95. 



continued on page 1 1 




Macintosh 
Notes 

Mac 512™, Macintosh Plus™, Mac XL™ 

We're all excited about the Macintosh version of 
ZBasic. With the Macintosh event-trapping, 
powerful toolbox software, MacinTalk interface 
and 68000 cpu, it is the most exciting version of 
ZBasic available. Cheers to Apple for making 
such a powerful human interface. 

This version of ZBasic is selling like hotcakes. 
People have been waiting for a "serious" BASIC 
for the Mac for a number of years and now they 
have it. 

Please submit your Mac-specific articles and 
subroutines, especially in the area of Toolbox use 
and Mac event-trapping, for inclusion in future 
newsletters. 

Send any suggestions or feedback. We're 
always looking for ways to improve ZBasic. 

Update Information 

Version 3.03 for the Mac was released December 
1, 1986. Users that bought ZBasic after 
September 1 can get free updates: see page 15 for 
complete upgrade information. 

How is version 3.03 different from 3.01 ? 

• Lots of fixes and fine tuning 

• 10 new Dialog functions 

• New Window refresh support 

continued on page 16 
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Apple 

continued from page 2 

start up ZBasic and read the 
version number. Version 3. 1 1 
was released on November 12. 
If you purchased ZBasic after 
August 15 and you have 
version 3.0, send in your 
master and a copy of your 
invoice and license agreement 
number to us for a free 
upgrade. Before that date the 
upgrade is $19.95. 

DOS 3.3 doesn't seem to be 
used much anymore. I 
remember a couple of years 
ago, when ZBasic was in the 
early development stages and 
ProDOS had just begun 
shipping, some of us thought it 
wouldn't make it. Boy, were 
we wrong. ProDOS is much 
more powerful and easier to 
use than old DOS 3.3 which 
now seems to be falling by the 
wayside. 

Applesoft™ to ZBasic™ 
conversion program 

A ZBasic user has created an 
Applesoft to ZBasic conversion 
program. It converts existing 
Applesoft™ programs over to 
ZBasic (about 98%). This 
saves a lot of time and frus- 
tration when converting. 

Available from: 
Carl Bringardner 
1736 E. North Broadway 
Columbus, OH 43224. 




FREE UPGRADES 
for 60 DAYS 

Only $19.95 
thereafter. 



Ifrteifey jfe--' . *«53fa*3 a*i-.-:«*r '- aby W. 



APPLE //Technical 
Support Notes 

David Lewis, Zedcor Technical 
Support Group 

As part of the Zedcor support 
group let me express my desire 
to help you with any of your 
ZBasic questions. Feel free to 
contact me at Zedcor, 5 days a 
week, from 1 1 AM to 5pm, 
MST. The phone number is 
(602) 795-3996. 

This column will cover the 
common problems ZBasic 
users have using this version. 
I get asked these same 
questions everyday and can 
recite the answers in my sleep. 
Keep your newsletters handy 
for future reference. 

Please send any subroutine 
solutions you have created for 
the Apple. I will include them 
in my column to help you and 
your fellow users. 

BSAVE and BLOAD 
Functions for DOS 3.3 

The following routines were 
provided by Greg Branche to 
do the BLOAD and BSAVE 
commands as in Applesoft™. 
These are long functions so be 
sure to put them at the 
beginning of your program. 

Listing on Opposite Page. 

How to get a Catalog 

(DIR) 

During Runtime 

The following function was 
given to us by Greg Branche. 
It allows getting a disk 
directory from a running 
ZBasic program. To load the 
directory into your program 
you could PEEK at the text on 



the 40 column screen and load 
it into an array. The 40 column 
screen starts at memory 
location 1024 but is not 
contiguous. See page 31 of the 
Apple //e reference manual for 
address map (figure 2-5). 



LONG FN DIR (slot, drive) 


POKE 


&AA6A, slot 


REM 


slot number 0-7 


REM 


usually slot six 


POKE 


&AA68, drive 


REM 


drive 1 or 2 


CALL 


&A5 6E 


END FN 






Runtime DIR 



Loading Applesoft™ 
Programs into ZBasic™. 

We have had many requests for 
a way to easily load Apple- 
soft™ programs into ZBasic™. 
Many people have tried 
LISTing the program to disk 
but this adds an extra blank line 
which confused ZBasic (fixed 
in version 3.11). 

I asked Greg Branche, head of 
our Apple // R&D section, to 
help me out. He gave me these 
ingenious instructions and a 
program line that solves the 
problem nicely; 

STEP 1: The program must first be 
converted into a sequential text file 
by adding the following line to the 
program you want to convert. Make 
sure your Applesoft program doesn't 
have a line zero, then add: 



F$="FILENAME" : PRINT 
CHR$(4)"OPEN";F$:PRINT 
CHR$(4)"WRITE";F$:POKE 33,33: 
PRINT"0"; :LIST 1-:PRINT 
CHR$(4) ; "CLOSE": TEXT: END 

Applesoft™ to ASCII 



continued next page 
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continued from previous page 

STEP 2: After running the program 
above, your program is now in text 
format on the disk with the filename 

"FILENAME". 

To load the program you just created 
into ZBasic, first load ZBasic, press 
"E" for edit and then type; LOAD 
"FILENAME". After a minute or so 
the program will be loaded into the 
ZBasic editor for compiling. 

STEP 3: SAVE the program with 
the FILENAME you want. 



Setting Aside 
"SAFE" Memory 

A number of programmers 
have asked how to set aside 
"safe" memory for machine 
language programs. 

A simple way is to use a DIM 
statement. Example; if you 
need 100 bytes, use DIM 
Fake%(49). This sets aside 
100 bytes for this integer array 
(2 bytes per element 0-49). 

SafeAddress% = VARPTR (Fake% (0) ) 



REM: BSAVE function same syntax as Applesoft except 
REM: it has FN in front of it: You must supply Start 
REM: address and Length 
LONG FN BSAVE (Name$, Start, Length) 

Name$=" !4"+Name$ : REM File type 4= binary file 

OPEN"0", 1, NameS 

Write#l, Start, Length: REM Header info 

End=Start+Length 

FOR i=Start TO End STEP 2 
a%=PEEK WORD(i) 
WRITES 1, a% 

NEXT i 

CLOSE#l: REM All done! 
END FN 

REM: BLOAD function same syntax as Applesoft except 
REM: it has FN in front of it: If Start=zero 
REM: load the file where it was previously saved from. 
LONG FN BLOAD (Nama$, Start) 

Name$="!4"+Name$ : REM File type 4= binary file 

OPEN"I",l, Name$ 

REM If Start address not given use file address 

IF Start=0 then READ#1, Start ELSE Read#l, End 

READ#1, Length :REM Get length from file 

WHILE Length>128 

READtl, a$;128:REM Read 128 bytes at a time 
FOR i=l TO 128 STEP 2 

POKE WORD Start-1+i, PEEK WORD (VARPTR (a$) +i) 
NEXT i 

Length=Length-128 
Start=Start+128 
WEND 

READtl, a$; Length: REM Read the last bytes 
FOR i=l TO Length STEP 2: REM Finish pokes to mem 

POKE WORD Start-1+i, PEEK WORD (VARPTR (a$) +i) 
NEXT 1 
CLOSE#l 
FND FN 

Apple // BSAVE and BLOAD FN's 



How to Configure Graphic 

Coordinates to Apple's 

Pixel Resolution 

To set graphics to pixel 
coordinates of 280 x 192 for Hi- 
Res and 560 x 192 for Super 
Hi-Res (versus the standard 
ZBasic device independent 
Graphic coordinate system of 
1024x768) do the following: 

POKE &F388, £60 

REM Sets to Apple's coordinates 

To reset the system back to 
ZBasic coordinates: 

POKE SF388, SA9 

REM Reset to ZBasic coordinates 

ProDOS Version Notes 

The ProDOS version of ZBasic 
will be out early next year. 

There will be two versions; 
One that operates in 64K, 
primarily for old Apple //+'s 
and the new //e's without 
extended memory; and a 
128K version for the //e and //c 
with 128k. 

Both the 64K and 128K 
versions will be included on the 
same disk. The new ProDOS 
version of ZBasic will be called 
4.0. 

Some of the features of the 
New ProDOS™ Version 

• Both the 64K and 128K 
versions will support ProDOS 
RAM disks; take advantage of 
extra memory 

• BLOAD and BSAVE FN's 
that use ProDOS directiy 

• Change system prefix 



continued page 12 
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Z80 

continued from page 2 

the latest version of ZBasic. 

Upgrade Information 

The latest version of ZBasic for 
CP/M-80, Amstrad, TRS-80, 
andKaypro, is 3.1. It has 
been available since August 
1986. 

Upgrades for people that 
purchased version 3.0 since 
June 1,1986 are free; just 
send your master diskette with 
a copy of your dated invoice 
for replacement. If purchased 
prior to Aug. 1, cost is $19.95. 



New Manual 

The Third edition manual is 
also available for $19.95 (one 
to a customer). It has the Z80 
appendix built-in and has been 
revised and re-edited. It is now 
630 pages compared to the 
second edition which was 400 
pages. Well worth the $19.95. 



High-Speed Math Package 
Available for Z80 

We now have available for 
CP/M and TRS-80 model 4, 
the Z80 high-speed binary 
floating point math package 
option. It does binary floating 
point math in 6 digit precision 
and is 3-10 times faster than the 
BCD version of ZBasic. It is 
quicker than greased lightening 
for those scientific programs 
that can't wait 

It does not have the accuracy or 
selectable precision of the BCD 
version but it sure is quick! 

It is available now for $59.95 
plus shipping. 




Z80 Technical 
Support Notes 

David Lewis 
Zedcor Technical Support 

As part of the Zedcor support 
group, let me express my 
desire to help you with any of 
your ZBasic questions. 



dLodSIG 

Technical 
Support 

(602) 795-3996 

10:00 AM to 5:00 PMMST 
Monday-Friday 



This column will cover the 
common problems ZBasic 
users have using this version. 
I get asked the same questions 
everyday and can recite the 
answers in my sleep. Keep 
your newsletters handy for 
future reference. 

Please send any program 
solutions you have created for 
this version. I will include 
them in my column to help 
your fellow users. 

Runtime DIR with CP/M 

A number of you have asked 
for a way to get disk directories 
in a running ZBasic program 
for CP/M 2.2, CP/M plus and 
CP/M 3.0: Mr. Jessup from 
Jessup's Softworks, 2205 
Ingrid Ave., San Diego, CA 
92154, was kind enough to 
send an example program that 
reads the CP/M directory. 

Thank you Mr. Jessup: 

Program listing on opposite page. 



BREAK key Problem with 
NEWDOS on TRS-80 

This problem crops up when 
people are using ZBasic with 
NEWDOS. It has to do with 
NEWDOS disabling the 
BREAK key. Simply 
reconfigure NEWDOS to 
enable the BREAK key and the 
problem is solved. 

After using CMD" ", my 

TRS-80 program "hangs". 

What's the problem? 

ZBasic allows you to do many 
of the TRSDOS or NEWDOS 
calls with CMD"" only if those 
commands fit within the 
memory allocated to the 
system . Some commands, 
like COPY, will load larger 
modules over your program 
code and destroy it. ZBasic 
starts at &3000 on Model 4's 
and &5200 on model 1-3. Be 
sure the code does not 
"overflow" into this region. 

You will need to determine 
which DOS functions cause the 
problem through trial and error 
(unless some kind soul will 
send a listing of which ones 
work and which don't). 

Another way to overcome this 
problem is to call a "DO FILE". 
A "DO File" is created using 
"BUILD" in TRSDOS and 
most other DOSes and can be 
used to execute a series of 
operating system commands 
and give a final command to re- 
execute your program. Of 
course variables must be 
saved. ••• 
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Jesuo's Softworks 



25 FCB5, TEMP$, 80 I$(150), 1 A$, DR$ 



REM XDIR 1.0 11/08/85 

CLEAR 

DIM 128 DMA$ 

REM 

REM 

"XDIR" 

CLS 

REM 

REM ©1985, Jessup's Softworks. Public Domain. 

REM Use in your programs for non-commercial use. 

REM Mr. Jessup at (619) 424-7288 for commercial use. 

REM 

I=LEN(S$) /12 

PRINTS (40-1,1) ;S$ 

LOCATE 0,2: CLS LINE 

INPUTS (22,2) "DIR OF WHICH DRIVE 



OR 'B' 



THEN IF DR$<>"B" 



DR$ 
THEN 90 



DR$=UCASE$ (DRS) : IF DR$<>"A" 
LOCATE 0,2: CLS LINE 

PRINTS (32,2) /"DIRECTORY OF ";DRS;":'" 
IF DR$="A" THEN DR=1 ELSE DR=2 
PRINT 

FCB$=CHR$ (DR) +"???????????"+CHR$ (0) :DMA$=SPACE$ (128) 
REM "SET-DMA" Set DMA address 

REM LD C,#1A; LD DE, DMA$; INC DE; CALL BDOS 
MACHLG S0E, SlA, ill, DMA$, &13, &CD, &05, &00 
REM "SEARCH-1" Search for first 

REM LDC, #11; LDDE,FCB$; INCDE; CALLBDOS; LD(FIL%),A 
MACHLG fiOE, fill, fill, FCB$, &13, &CD, &05, fiOO, &32,FIL% 
FIL%=PEEK(VARPTR(FIL%) ) : REM Low Byte 
J=0 

LONG IF FIL%<4 
DO 

J=J+1:IF J>64 THEN PRINT ERROR J>64": GOTO 400 

K=FIL%*.32+2 

TEMP$=MID$ (DMA$,K, 11) 

1$ (J)=TEMP$ 

A$=MID5 (DMA$,K-1,1) 

IF A$=CHR$(SEF) THEN J=J-1 

FIL%=VARPTR(FIL%) 

REM "SEARCH-2" Search for second 

REM LD C,#12; CALL BDOS; LD (FIL%),A 

MACHLG S0E, S12, SCD, fi05, fiOO, S32, SFIL% 

FIL%=PEEK(VARPTR(FIL%) ) : REM LOW BYTE 
UNTIL FIL%>5 
END IF 



400 


FOR 1=1 TO J 


410 


TEMP$=MID$ (1$ (I) , 1,8) +"."+MID$ (IS (I) , 9, 3) 


420 


PRINT " ";TEMP$;" 


430 


IF (I MOD 4 =0) THEN PRINT ELSE PRINT ":"; 


440 


NEXT I 


450 


PRINT: PRINT 


460 


PRINT "THERE ARE ";J;" FILE<S> ON DRIVE ";DR$;":." 


470 


PRINT "THERE IS ROOM FOR ";64-J;" MORE" 


480 


PRINT 


490 


PRINT: INPUT"PRESS RETURN TO CONTINUE"; TEMP $ 


500 


RETURN 




CP/M-80 or CP/M Plus 




Runtime Dl Rectory 




Example 



ZBasic Inventor 

continued from page one 

a powerful "Standardized" 
version of BASIC that runs on 
many computers. 

He has supervised all the 
current versions and is respon- 
sible for the newest updates to 
the Macintosh version . 

Andrew has previously been 
involved in R&D for both 
Hardware and Software at 
National Semiconductor, Burr- 
Brown, Inc., and Simutek 
Computer Products, Inc. 

He has designed complete 
computer systems and 
peripherals as well as systems 
software. 

Andrew is President of Zedcor, 
Inc. aa ° 
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Dear Dr. Z, 

INDEX$ does not work. 

Kurt Allen Deadorff 
7417 Lazy S. Lane NE 
Bremerton, WA 98310 

The problem you are having 
with INDEX$ is a common 
one. What is happening is that 
you must set aside memory for 
INDEX$, otherwise it appears 
not to work. The command to 
use is CLEAR nnnn, where 
nnnn is the number of bytes 
needed for the INDEX$ arrays. 
This is limited to the available 
memory of the computer. See 
the appendix for your computer 
for specifics and also see the 
"MEM" command in the 
reference section. 

Dear Dr. Z, 

Suggestion: clearly state that 
ALL KEY WORDS MUST BE 
PLACED IN CAPS at the 
beginning of the manual. 

David Nunn 

Stanford University 

3325 Stockton PL 

Palo Alto, CA 94303 

You're right David. This 
confuses folks that are used to 
other versions of BASIC that 
don't care about case. I will 
have your suggestion added to 
the next addition of the manual. 
The solution to this problem is 
to set COVERT TO UPPER- 
CASE to "YES" under 
configuration. This will 
alleviate the confusion. It will 
also make a variable like "Fred" 
the same as "FRED". 

Dear Dr. Z, 

We develop for the Apple, and 
I would like to know if your 
Apple version would allow us 
to change the character sets 
when using text and graphics. 
We write chemistry and 
educational software and would 
need many special symbols. 
Thanks. 

Paul Groves 

The Mole Company 

15455 Glen Oaks BL #243 

Sylmar, CA 91342 




!. Dear. Dr. Z .'• 

(Dr. Z is half- computer, half- 
Human. 9le is from the world of 
Silgorythmium-- a darkjtrange land 
cf'DataTreesand'BxnarygahvQes. 

Oit thinks in Z'Basic and knows all 
there is to know about the. 
language. 9le is a being cf strange 
knowledge and incredible, powers. 

If you have any questions about 
Z'Basic send them tolh.Z. 9k 
will answer all letters. Those 
letters of public interest will 
appear in this column. 

Unless otherwise specified, names 
and address will appear in the 
column. 

Send questions to: 

<d% z 

4500 'E. Speedway, #22 
Tucson, AZ 85712 



The release of the Apple II 
ProDOS version has facilities 
for loading in your own 
character sets for the He, He or 
11+ . This should solve your 
problem. Word is that existing 
owners of the Apple version 
will get the ProDOS version at 
50% off! Look for it around 
the end of the year. 



Dear Dr. Z, 

Is there any way to defeat the 
automatic indentation of loops. 

Tom Ashwell 

BusinessCare 

Box 189 

Thornhill, Ontario L3T 3N3 



Yes. Just load your source 
code (saved in ASCII with 
SAVE*) into a word processor 
then list it out to the screen or 
printer. Listing to the screen 
without indentation can also be 
accomplished using the up- 
down listing keys; the cursor 
keys on MSDOS and Apple I te- 
lle machines, the /, / and ] keys 
on the Macintosh, and 
configurable on other 
computers. 



Dear Dr. Z, 

When I set ZBasic to default to 
Single or Double precision 
under "Configuration", ZBasic 
runs slower than MBasic™! 

Anonymous 

That's right! Standard ZBasic 
comes with a High-Precision, 
BCD package (all FP 
calculations default to 14 digits 
precision). While you can get 
incredible precision without the 
rounding errors inherent in 
Binary Math packages (a 1 can 
be .999998), the performance 
for doing integer and scientific 
calculations is a bit slower . 
Therefore it is extremely 
important to define only those 
variables that will be used in 
floating point operations as 
single or double precision. It is 
also extremely important to set 
Double precision accuracy to 6 
digits (8 on the Mac) to get 
maximum speed since Double 
precision sets the internal digits 
of calculation, not single 
precision. ZBasic "Integer" 
math is faster than any other 
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language! 

Some examples of things that 
don't need to be floating point; 
a FOR -NEXT loop variable, 
any numbers between -32768 
and +32767 (±2billion on the 
Macintosh), any math done in 
integer range and any other 
integer functions. Setting 
ZBasic configuration to default 
to single or double precision is 
a sure way to slow down a 
program. 

We have a high-speed, binary 
math package available for Z80 
computers for $59.95. Watch 
for optional high speed, binary 
math packages coming for the 
IBM PCIMSDOS version 
(supports 8087 and 80287 
coprocessors) and the Mac- 
intosh and Apple II (SANE and 
68881 coprocessor support). 

The speed of floating point for 
the high-speed, binary math 
options is incredible, but it will 
not have the configurable 
precision of BCD ZBasic. 



Dear Dr. Z, 

Excellent package for only 
$89.95. I could use a full 
screen editor though (IBM 
version). 

Michel Blais 

16431-97 Ave. 

Edmonton, Alberta T59 0E7 



The problem is solved in 
version 4.0 for MSDOS-IBM 
PC and Apple II computers 
coming in December. I've 
used it and it's great. 

Write and edit programs 
without line numbers, or with 
line numbers on only some 



continued next page 



Introduction 

continued from page one 

The ZBasic language is a living 

thing. It is constantly 

changing, growing and 

expanding to fit the needs of its 

users. Most of us here are 

programmers. We understand 

the concerns of other 

programmers. We would like 

to make this publication a 

useful tool by providing a 

forum for 

ZBasic users 

to share 

experiences, 

programming 

ideas and 

provide 

support for 

each other as 

well as the 

support from 

Zedcor. This 

will help us 

provide you 

with a 

language that 

fits your 

needs in 

every possible way. 



V*- 




more ZBasics than we ever 
imagined — and most of the 
sales have been from word of 
mouth. Many thanks to all of 
you for your support. 

We hope you enjoy this issue. 
Everyone at Zedcor worked 
hard to put it together. Special 
thanks to Andrew' Gariepy, 
David Lewis, Greg Branche 
and Hal Liang for their 

technical 
support. The 
newsletter 
was printed 
using Micro- 
soft Word™ 
and Page- 
Maker™ on a 
Macintosh 
Plus™, with 
an Apple 
Laser- 
writer™. 






^llll 









Michael A. Gariepy 



Zedcor began shipping the IBM 
PC®/MSDOS™, APPLE II® 
and Z80™ versions of 
ZBasic™ in September of 
1985. Since then we've 
added the Macintosh version 
and the High Speed floating 
point math package for Z80 
machines and are working hard 
on the latest new products for 
next year. 

We have finally installed 
systems to keep track of our 
rapidly growing customer base. 
This allows us to inform you in 
a timely manner of updates and 
revisions with this newsletter. 

It's been a busy year and we all 
thank you for making it a 
prosperous one. We've sold 



We Need Your Support 

To make "Z" a success we need 
your active involvement. 

Please submit articles, utility 
subroutines, or any other 
information that may be useful 
or of interest. I'll include 
submissions in the newsletter 
for the benefit of all. 

"Z" has quite a few helpful 
programs but to make future 
issues even more valuable we 
will need your involvement. 

Any feedback about how I can 
improve the newsletter or make 
it more useful will be 
appreciated. « e8 

Ed. 
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lines, complete 
cursor control and more, (this 
is not to mention all the other 
additions to 4.0.) 

Dear Dr. Z, 

Enclosed is a program I've 
created that will APPEND data 
to an existing (text) file. 

Jim McGarity 

41 1 Jackson Ave. 

EndicotL NY 13760 

(607) 748-9568 

Thanks Jim. This program 
was written for MSDOS 
ZBasic but should work 
equally well with the CPIM, 
TRS-80 and Apple II versions. 
Note that TRS-80 RECORD 
lengths are 256. Note that the 
Mac version has an APPEND 
command so this program is 
not necessary. 

Listing on the right-> 

Dear Dr. Z, 

I want to add BLANK lines to 
my program listings to make 
them easier to read. 
Unfortunately, ZBasic requires 
a REM on blank lines. 

Anonymous 

Here's a simple solution. Use a 
colon (:) instead of a REM. 
This looks much better. 

Dear Dr. Z, 

I have enclosed a listing of 
another version of Quick-Sort, 
which I think is much better 
than the awkward one that you 
supplied with- ZBasic 3.0. Try 
it! 

Johan Brouwer 

6 rue de la Vallee 

L-7337 Heisdorf 

Luxembourg 

/ was SORT of skeptical when 
I saw this listing (and even 
more so when I saw I'd have to 
type it in!). Mr. 

Brouwer was right. The Quick- 
Sort supplied with ZBasic 



sorted 50,000 long integers on 
the Macintosh in 3 minutes. 26 
seconds., Mr.Brouwer's 
Quick-Sort did the same 
number in minute. 54 
seconds. Clearly superior! 
Thank you sir. The listing is 
on the opposite page: 

Dear Dr. Z, 

I need a package that takes 
FULL advantage of the 
LaserWriter. MSBasic does not 
support this. Does ZBasic? 

Richard Harbue 

Progressive Designs 

668 Dahlia Way 

Louisville, CO 80027 



You bought the right language 
Richard. We do everything the 
Apple LaserWriter driver can 
support. Using ROUTE 128 
allows you send graphics and 
text simultaneously. LPRINT 
with the ZBasic TEXT 
command allows complete font 
control (ZBasic even lets you 
do color on the ImageWriter 
II). ••• 
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REM FUNCTION: Open 

REM Open the filename fS for APPEND as file 
REM number f % . The record pointer will be 
REM positioned to the next available position 

LONG FN Open(f$,f%) 

OPEN"R", f%, F$,128 

Filelen%=LOF(f%) : NextRec%=FileLen% : NextLoc%=0 

LONG IF FileLen%>0 

NextRec%=NextRec%-l 

RECORD #f%,NextRec%,NextLoc% 

READ#f%, NextRec$;128 

NextLoc%=INSTR(l,NextRec$,CHR$(26)) :REM Apple=CHR$ (0) 

LONG IF NextLoc%>0 
NextLoc%=NextLoc%-l 

XELSE NextRec%=NextRec%+l 

END IF 
END IF 

RECORD #f%, NextRec%, NextLoc% 
END FN 



REM FUNCTION: Close (CLOSE file w/EOF char, f ilenumber=f %) 
LONG FN Close (f%) 

PRINT #f%, CHR$(26) ;:REM CHRS (0) for APPLE 
CLOSE#f% 
END FN 

Note to MSDOS users: With the addition of USRl(filermmber) in version 

3.02 as an EOF equivalent, other ways of doing this are possible. 

Notes: 

LINE 80: File MUST be opened with record length of 128 so that LOF yields 

the EXACT number of 128 byte records. (256 WITH TRS-80) 

LINE 110: Since LOF returns the number of records in the file (and not the 

number of the Last record Of the File), the value needs to be adjusted to point 

to the last 128 byte record of the file. 

LINE 130: READ MUST be exactly 128 bytes to get the last sector. 

LINE 150: If EOF character (CHRS(26)) IS found in the last record sector, 

then position must be adjusted by one. If not found then function assumes 

you want to append starting at the physical end of file (beginning of the 

next record/sector). 

LINE 250: Since the file was OPENed as "R", you must explicitly write 

out an EOF character to it before closing. 

APPEND Sequential Files 
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A "Quicker" Quick-Sort 

The following listing was provided by a ZBasic user like 
yourself. This sort is incredibly fast! If you have any 
program routines like this, send it in! We'll publish it. 
Nobody likes to re-create the wheel. 

REM This routine was written by Johan Brouwer and 
REM can be regarded as public domain so use it freely 
REM in all your programs. (Thanks Johan! Dr. Z.) 

REM This is an improved version of the Quick-Sort 

REM Supplied with ZBasic 3.0. It also includes element 

REM of array SA() in the sort, and is much faster. 

"IMPROVED QUICK SORT" 

REM In the following program, a stack-array; ST(,), is 
REM dimensioned instead of the L() and R() arrays used 
REM in the calling program on page 102 of the manual. 

DIM ST (30,1) 

SP=0: ST(0,0)=0:ST(0,1)=0 

SF=-1:ST(0,1)=NI 

DO 

L=ST(SP,0): R=ST(SP,1): SP=SP-1 
DO 

LI=L:RI=R: SA=SA( (L+R) /2) 
DO 

WHILE SA(LI) < SA 

LI=LI+1 
WEND 
WHILE SA(RI)>SA 

RI=RI-1 
WEND 
LONG IF LI =< RI 

SWAP SA(LI) , SA(RI) 
LI=LI+1: RI=RI-1 
END IF 
UNTIL LI > RI 
LONG IF (R-LI) > (RI-L) 
LONG IF L<RI 

SP=SP+1: ST(SP,0)=L: ST(SP,1)=RI 
END IF 
L=LI 
XELSE 

LONG IF LKR 

SP=SP+1: ST(SP,0)=LI: ST(SP,1)=R 
END IF 
R=RI 
END IF 
UNTIL R <=L 
UNTIL SP= -1 

RETURN: REM QUICKSORT FINISHED HERE 
END 



ffiM/MSDOS 

continued from page two 

It converts about 95% of your 
program to ZBasic syntax in a 
flash. What it can't convert, it 
documents and gives you 
suggestions of how to convert 
those lines manually. 

This program will shorten 
conversion time by many 
hours. A real time saver! Call 
1-800-482-4567 to order. 

IBM PC®- MSDOS™ 
Technical Support Notes 

David Lewis, Zedcor Technical 
Support Group 

As part of the Zedcor support 
group, let me express my 
desire to help you with any of 
your ZBasic questions. Feel 
free to contact me at Zedcor, 5 
days a week, from 11am to 
5pm, MST. The phone number 
is (602) 795-3996. 

This column will cover the 
common problems ZBasic 
users have using this version. 
I get asked these same 
questions everyday and can 
recite the answers in my sleep. 
Keep your newsletters handy 
for future reference. 

Please send any program 
solutions you have created for 
this version. I will include 
them in my column to help 
your fellow users. 

Reading the MSDOS™ 
Command line 

A number of users have asked 
for a way to read the command 
line from DOS. This is handy 
for passing data to your .COM 



continued next page 
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APPLE 

continued from page 5 

• A powerful Full Screen Editor 
(use without line numbers) 

• Extremely easy-hooks to Pro- 
DOS machine language 

• Both 64K and 128K versions 
include at no extra charge 

• Text and Graphics integration 

• Super-High Resolution 
graphics supported (not //+). 

• Creats ".SYSTEM" files 

• Configure printer initialization 

• Changeable character sets for 
the high-res character driver 

• Other Top-Secret stuff that 
will blow your socks off! ! 

To show our appreciation to 
original DOS 3.3 users we will 
off the ProDOS version at 50% 
off to existing ZBasic DOS 3.3 
users (about $45). ••• 




IBM 

continued from previous page 

files directly. For instance, if 
your program was called 
"FRED.COM" and you 
wanted a user to be able to pass 
a file to your program when 
loading it by typing in "FRED, 
Filel2" from MSDOS, you 
could read the filename by 
using the example program and 
reading the ASCII characters 
into a string (from the sixth 
position in this example). A 
listing for reading data off of 
the MSDOS command line 
follows: 



"GET COMMAND LINE" 
A$="":A=PEEK( 128, MEMO 
IF A=0 THEN "END" 
FOR B=130 TO 128+A 

AS=A$+CHR$ (PEEK ( (B, MEMO ] 
NEXT: REM A$=C0MMAND LINE 
"END":RETURN 

Command Line 



Reading Sequential files 
larger Than Eight MB 

Thanks to Mr. Jack Speer in 
Mineral Virginia who was 
working with CD ROMS, we 
discovered that MSDOS sets an 
arbitrary limit of eight (8) 
megabytes to Sequential file 
reads. Hal Liang gives us this 
routine that fixes the problem. 
Using this routine Mr. Speer 



0PEN"I", 1, "SEQ.TXT":X5=0: REM Change filename as needed 
DO 

G0SUB"D0S Fix" 

PRINT A$;:PRINT " >";LEN (AS) :REM A$ contains string data. 

UNTIL X5 = 1 
END I 



"DOS Fix":TROFF:REM Always make sure Trace is off with MACHLG 

MACHLG SC7,s06,S66,SO3,s2O,S00,&8B,Sl6,s7F,S03,S42,SB4,SlA,6CD,s21 

MACHLG SBA,S58,S03,SB4,S14,SCD,S21,S8B,636,S7F,£03,SC6,S04,S20 

MACHLG SC6.S44, 621, S00, SBF, A$, SB9, S34, 600, SF3, 6A4, SOA, SCO, S74, S03 

GOTO "Finish" 

RETURN: REM MACHLG code jumps here don't change 

"Finish": X5=1:REM End of File Flag 

B$=A$: A$=LEFT$(B$, INSTR (1, A$,CHR$ (0) ) -2) : RETURN 

Sequential Files Greater than 8 Megabytes 



was able to read files of more 
than 500 megabytes. As far as 
we know more than a billion 
byte file can be read this way: 

• The following subroutine 
allows the MSDOS version of 
ZBasic to read sequential files 
larger than 8 megabytes. It will 
read a file sequentially 32 bytes 
at a time (returned in A$). The 
flag "X5" is set to 1 when the 
END OF FILE is reached. 

Printing on the CGA 
Screen without "Snow" 

In order to remain compatible 
with other boards and 
computers for MSDOS 
machines, ZBasic sends Color 
Graphics Adaptor text printing 
through the BIOS. On some 
systems this causes a bit of 
screen flickering or "snow". 
Lon McQuillin, Box 1676, 
San Mateo, CA 94401, has 
sent us a little routine that will 
fix this. Thanks Lon .... 

"I was able to create a rather 
simple but functional assembly 
routine to write direcdy to the 
Color Graphics adapter without 
the normal resulting "snow" 
effect While it's not as fast as 
the "POKE &342,1" function 
available for the monochrome 
display adapter, it is consid- 
erably faster than writing the 
screen through BIOS. I've 
enclosed the assembly pseudo- 
code and a complete (ZBasic) 
subroutine ready to be inserted 
in any ZBasic MSDOS 
program. I encourage you to 
share it with other ZBasic 
users." 

"FILES" Simulation 

This routine is a handy one for 
those folks wanting to simulate 
the FILES command as in 
BASICA. This routine was 
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submitted by: Steven Abrams, 
1600 44th Ave., San 
Francisco, CA 94122. Thank 
you Steven. I'm sure a lot of 
users will appreciate it. 

Runtime "DIR" 

A number of folks have asked 
how to get a listing of the files 
on the disk from a running 
program. To get a DIRectory 
printed to the screen simply use 
CALL"DIR". 

Another way is to load a DIR 
into a text file so that you can 
load the filenames into your 
program and manipulate them; 

CALL "DIR>DIR.TXT" 

(make sure there are no spaces 
in the filename). The file 
"DIR.TXT" will contain the 
ASCII listing of the files. Load 
filenames into a string array 
using LINEINPUT#n, and use 
them as you see fit. 

Note: COMMAND.COM must 
be on the disk for either of 
these examples to work 
properly. 



FilA$=' 


A:\*.*"+CHR$(0) :FilB$="B:\*.*"+CHR$(0) 










"FILB" 


file$=FilB$:CALL LINE"f iles" 










"FILA" 


file$=FilA$:CALL LINE"files" 










"files' 












MACHLG 


£O6,£lE,&50,s53,£51,£52,£0E,£lF,£B4,s2F, 


SCD, 


£21, 


£BA, 


file$ 


MACHLG 


£B4,S4E,SB9,SO0,£OO,SCD,S21,£72,£l2,£E8, 


S23 


SOO, 


SB4, 


£4F 


MACHLG 


SB9,S00,S00,SCD,£21,S72,S0 6,£E8,£17,S00, 


SEB 


SF2, 


£90, 


£B2 


MACHLG 


SOD, SB4, S02, SCD, &21, SB2, SOA, SB4, &02, SCD, 


S21 


&5A, 


£59, 


£5B 


MACHLG 


£58, SlF, &07, SC3, &90, SB9, SOD, SOO, SBB, S9E, 


£00 


S26, 


£8A, 


£17 


MACHLG 


SB4,S02,SCD,S21,£B0,£20,S2 6,£88,£07,&43, 


SEO 


SF1 


£B9 


£07 


MACHLG 


SOO, SB2, S20, SB4, S02, SCD, £21, SEO, SF8, SC3 










RETURN 






' 








"FILES" 











Getting more Speed out of 
Array Manipulations 

When DIMming string array 
lengths, use a number that is 
equal to 2 A n-l where 
n=l, 2,3,4... This speeds up 
internal array manipulations 
because ZBasic will do 
SHIFTS instead of multiply for 
accessing array elements. 
Example string lengths would 
be 3, 15, etc. Example: 

DIM 3 A$ (10,10) 
DIM 15 A$(10,10) 

Integer arrays DIMension size 
is also important: 

dim a% (15, 15) is faster than 

DIM A%(16,16) 



REM Print a line directly to CGA without snow 

REM Writes to Page 1; for other pages add offset to dest 

REM Call with string to be printed in print$ 

REM row in vp, column in hp, attributes in color. 

REM DIM 80 print$ before calling this routine. 



"PRINT CGA" 

REM CLS LINE=print$=print$+SPACE$ (80-LEN (printS) -hp) 

source=VARPTR (print$) +1 

len=LEN(print$) 

dest=(vp*160) + (hp*2) 

attr=color*25 6 

MACHLG £55, S8B, SEC, £53, £51, £52, SlE, £06, SFC 

MACHLG SB9, S00, SB8, S8E, £C1, S8B, S3E, dest , S8B, £36, source 

MACHLG SBA, SDA, S3, SEC, £A8, £8, S74, SFB, S8B, SE, len 

MACHLG SA1, attr, S8A, S4, SAB, S46, SEO, SFA 

MACHLG £07,SlF,£5A, £59,S5B,£5D 

RETURN 



CGA "SNOW" Removal 



Tandy 1000 OPEN"C" Fix 

A number of Tandy 1000, 
1200HD and other Tandy 
model users have had a 
problem with the OPEN"C" 
command. It appears that 
Tandy pin-outs were slightly 
different from the IBM PC. A 
simple fix for this was 
provided by an anonymous 
user. To force carrier detect 
high simply wire pins 4 and 5 
together and pins 6, 8 and 12 
together. Thank you, whoever 
you are. 

Tandy 2000 Note 

People using the Tandy 2000 
have experienced a peculiarity; 
when starting up ZBasic, the 
screen is filled with garbage 
characters. This is because 
ZBasic starts up in a different 
page. While it looks like the 
program has crashed, 
pressing "E" puts you in the 
ZBasic editor and everything 
works fine from there. The 
start-up page for the 2000 is 
not the same as most MS DOS 
systems. 

Zenith Z-100 Series Note 

The Zenith Z-100, Z150 and 
possibly others require a 
program that forces the 

continued next page 
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MSDOS environment to be 
more like standard MSDOS 
machines. This program is 
called "ZPC-PC Emulation 
Program". It is available from 
Heathkit and Zenith dealers. 
Without running this program 
ZBasic will not execute 
properly (DOS gives a "WILD" 
interrupt error). 

Text Formatting in 
Monochrome Mode 

I have received a number of 
requests how to format text for 
highlighting, reverse video, 
etc. The following examples 
should clear it up for you. You 
might want to make a xerox of 
this page and insert on page A- 
24 (thanks to Hal Liang, our 
MSDOS expert and Pat 
Anderson a ZBasic user for 
these suggestions for using 
COLOR in the monochrome 
mode (MODE 2 in ZBasic). 
Example: 

MODE2:REM REVERSE BLINKING 
COLOR ,240 

Patches to Early versions of 
version 3.02 

If you purchased ZBasic for the 



Monochrome Text 


Examples 


KflOoaLIntensLty 




Regular 


COLOR ,7 


Blinking 


COLOR435 


Underline 


COLOR.1 


UL Blinking 


COLOR.129 


Invisible 


COLOR, 136 


(e.g. for inputting Passwords 


HMi Intensity 




Regular 


C0L0R.15 


Blinking 


COLOR, 143 


Underline 


COLOR,9 


UL Blinking 


COLOR.137 


Rmrsed (Inverse) 




Regular 


COLOR.112 


Blinking 


COLOR.240 



LBM prior to the dates listed 
below you will want to apply 
the appropriate patch to fix 
bugs or problems. Patch is 
done under the start-up 
configure screen of ZBasic 
(<P>atch). Be sure to patch a 
back-up diskette of ZBasic, not 
your master diskette. When 
you are done be sure to save 
your configuration with 
<S>ave 

4.0 Rumors 

We are working hard to finish 
version 4.0 for MSDOS PC's. 
With any luck it will be 
available early next year and 
will contain lots of goodies: 

• Full memory use for variables 
(arrays larger than 64K) 

• Powerful full screen editor 

• CGA, EGA, PGA, Hercules, 
and Hercules+/Ramfont 



graphics support 

• BASICA compatibility 

• Math coprocessor support 
(8087 and 80287) that utilizes 
the processor if installed, uses 
built-in high-speed binary math 
routines if not. Extremely fast 
but will not have the selectable 
precision of the existing 
ZBasic. 

• SELECT CASE (watch out 
Modula and Pascal!) 

• Other top-secret stuff 

Upgrades to existing users will 
be 50% off (about $45). This 
version will have a new manual 
and many enhancements. * 
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MSDOS™ version 3.02 Patches 

Patches to MSDOS Version 3.02 dated PRIOR TO APRIL, 1986 
Bug: AUTO divides line numbers by 10: 
PATCH 3A2B from: &4E to &90 

Bug: IBM Text printing on column 79: 
PATCH &E57 from &75 to &76 

IBM compatible hi-speed text printing for RUN* use. Note that the 
configuration does not stay set in stand-alone applications unless this 
poke is used. The method implemented for compatibility reasons: 
POKE &342.1 for on, POKE &342.0 for off. 

Bug: String Compares: 

1. PATCH &D2E from &77 to &72 

2. PATCH &CA2 from &CF to &C7 

3. PATCH &D39 from &DF to &FB 

Patches to Version 3.02 PRIOR TO AUGUST, 1986 

INDEXS problem during chaining: 

PATCH &3052 from: &E8, &50, &00, &8E, &D3 

to: &8E, &D3, &E8,&4E,&00 

Patch to all 3.02's RUNNING ON IBM PC-AT (80286) TYPE COMPUTERS: 
Patch to allow DTR from going low when writing to the communications 
port with the ZBasic OPEN "C" statement 
PATCH &3105 from &EE to &90 
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UPGRADES 

continued from page one 

always welcome. In fact, we 
carefully examine all feedback 
for ideas to improve the 
product and make it more 
useable. Please send 
comments or suggestions for 
improvements to my attention. 

If you do not have the latest 
version of ZBasic, or the latest 
reference manual, fill in the 
ordering form on this page. 
We will ship you your upgrade 
right away. 

I promise to continue providing 
upgrades at a fair price. 

Thank you for using ZBasic. 
We appreciate your 
business.*" 

Editor 



9-Cappy 
^Holidays 

fromZcdcor 
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ZBasic™ Upgrade 
Order Form 

This form will make ordering your ZBasic upgrade easy. 



Name 



Position 



Company_ 
Address 



City_ 



State 



ZIP 



Country_ 



Telephone( )_ 



License number 



When Ordered 



J /19_ 



□ Apple //ProDOS™ 

□ CP/M™(Kaypro® graphics) 

□ TRS-80™ model 1, 3 



What do you want upgraded: 

□ MSDOS™, IBM PC® □ Macintosh™ 

□ Apple //DOS 3.3 

□ CP/M™ 

□ Amstrad® 
D TRS-80™ model 4 

□ ZBasic Reference Manual 

Cost: If you purchased an older ZBasic version or manual in the 
past 60 days you are entitled to a free upgrade. Call: 800-482-4567 

If purchased more than 60 days ago the cost is S 19.95 + shipping 

(+ sales tax if applicable) for each version upgrade or manual upgrade. 

Software Upgrades: Free Upgrade: If you are elligible for a free 
upgrade we MUST have a copy of the dated invoice and the original 
ZBasic diskette. Others: *Zedcor Invoice OR copy of serial numbered 
License agreement OR Original ZBasic diskette and original invoice 
for each version you upgrade. Addendums included (manuals not replaced). 

Manual Upgrades: Return Front Cover of the Old Manual. Only one 
manual upgrade per customer at this price (additional manuals 
are available for $44.95 each + shipping). 

Mode of payment: Visa, MC, AMEX, Check, COD. 
**Manual Shipping: USA: UPS $5, Blue Label $10, COD $10 
Canada: $12, Foreign: $25 ~>USA$ ONLY (no foreign COD's). 

Questions: (800) 482-4567 

Send items and payment to: 

ZBasic UPGRADES 

4500 E. Speedway Blvd., Suite 22 
Tucson, Arizona 85712 

Telephone orders: (602)795-3996, (800)482-4567 

* Photocopies acceptable for everything except manual cover or cover page. 
♦♦Diskette only shipping is free in U.S. S5.00 outside U.S. 
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Macintosh 

continued from page 3 

• Window size up to 
8192x8192 pixels (supports 
full page displays). 

• Additions to EDIT FIELD 

• New DIALOG to do INKEY$ 
during event-trapping 

• Improvements of Command 
and Edit windows. 

• Printing Speed increased 5-20 
times for printer and screen. 

• Disk print speed increased by 
3-5 times 

• Lots of other things too 
numerous to mention 

It's well worth the $19.95. 

IMPORTANT UPGRADE 
NOTE TO 3.02 OWNERS 

As of this writing we have 
made changes to 3.02. The 
official release is 3.03. 



There were a few problems 
with 3.02. We have added a 
number of new commands on 
3.03. 

If you have version 3.02 
(not 3.01) send in your 
master diskette for a free 
upgrade to 3.03. 



Macintosh™ 
Technical Support Notes 

David Lewis, Zedcor, Inc. Technical 
Support Group 

As part of the Zedcor support 
group, let me express my 
desire to help you with any of 
your ZBasic questions. Feel 
free to contact me at Zedcor, 5 
days a week, from 1 1am to 



5pm, MST. The phone number 
is (602) 795-3996. 

This column will cover the 
common problems ZBasic 
users have using this version. 
I get asked these same 
questions everyday and can 
recite the answers in my sleep. 
Keep your newsletters handy 
for future reference. 

Please send any program 
solutions you have created for 
this version. I will include 
them in my column to help 
your fellow users. 

Converting Old MSBasic 
Programs To ZBasic 

Zedcor has an MSBasic™ to 
ZBasic conversion program 
available for $29.95. It 
converts about 95% of your 
program to ZBasic syntax in a 
flash. What it can't convert, it 
documents and gives you 
suggestions of how to convert 
it manually A real time saver! 
Call 1-800-482-4567 to order. 

Improving the speed of 
Array Manipulations 

When DDVIming string array 
lengths, use a number that is 
equal to 2 A n-l where 
n= 1,2,3,4... This speeds up 
internal array manipulations 
be cause ZBasic will do 
SHIFTS instead of multiply for 
accessing array elements. 
Example string lengths would 
be 3, 15 Example: 

DIM 3 A$ (10,10) 
DIM 15 A$ (10,10) 

Integer arrays DIMension size 
is also important: 

dim a%(15,15) is faster than 

DIM A%(16,16) 



Speed increase will be 
appreciable. 

Color Printing on the 
Imagewriter™ II 

ZBasic supports color printing 
on the Imagewriter™ n with 
the Macintosh. 0=white- 
7=black. What are the other 
colors? Yellow, Magenta, 
Cyan, Orange, Green and 
Purple. Of course you'll need 
a color ribbon for your printer. 
Run this program: 



DEF LPRINT 
ROUTE 128 
FOR X=0TO7 
COLOR=X 

PRINT "TESTING" 
NEXT 

ROUTE 0: 'Back to screen 
CLEAR LPRINT 

Imagewriter Color Printing 



Runtime Size 

A number of Macintosh 
programmers have asked why a 
small , one line program, 
compiles to about 33K. ZBasic 
appends a 30-33k runtime 
routine to your program, 
whether the program is one 
line, or 20,000 lines. 

Remember: the MSBasic 2.1 
interpreter is over 80K and has 
to be resident to run your 
BASIC program. 

continued on page 17 



Due to problems 

with earlier versions 

of Mac system software... 

always use 

SYSTEM 3.2 

and 

FINDER 5.3 

(or newer) 
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Can I Create Desk 
Accessories with ZBasic? 

Not in the current version 
because DA's have many 
differences and limits; like 
program size and certain 
commands. 

We are contemplating releasing 
a special , chopped down, 
version of ZBasic for creating 
desk accessories. If you find 
this desirable, drop us a note. 



Example Programs with 
"Spaces Between Keywords" 

Unlike other versions of 
ZBasic, we have put an option 
under configure called "Space 
req. after Key Words". This 
requires you to put a space after 
every key word in the program 
or ZBasic will not interpret it as 
a keyword (will probably 
return a syntax error). 

A good example is a command 
likeDEF OPEN (used to set 
type and creator for files). In 
the manual it is shown as 
DEFOPEN with no space 
between DEF and OPEN, 
which are both, you guessed it, 
keywords. To fix this 
problem just turn off the 
"Spaces between key words" 
option or put the spaces in 
yourself. 

We will endeavor to include 
spaces in the appropriate places 
in future editions of the manual 
to avoid confusion. 

DIR "Volume name" 

Version 3.03 has a change to 
DIR that was inadvertently left 
out of the manual and 
addendum. Instead of DIR n, 
it is now DIR "volumename". 



If you want the DIR of a 
diskette with the name of 
"Tom", type DIR "Tom". 
If you want the directory of a 
folder "Harry", inside a Folder 
called "Dick" inside the volume 
called "TOM", you would use: 

DIR TOM: DICK: HARRY 

Note that colons (:) are used to 
separate nested volumes and 
folders. 

Mac XL-LISA 

ZBasic is alive and well on the 
Macintosh XL and LISA with 
Macworks. Any tidbits or 
special applications sent in to 
us for this system will be put in 
this column. 

For those Mac XL users 
looking for a dedicated 
newsletter that LOVES the old 
LISA and MAC XL, checkout 
"The LisaTalk Report", a 
publication made especially for 
you. It is available quarterly 
from: The Networkers - The 
LisaTalk Report, 21 Canyon 
Rd., San Anselmo, CA 94960, 
for $42.00 a year. 

The one we saw was nicely 
done and contained a hundred 
pages of articles, advertise- 
ments and advice for the XL. 

Thanks to feedback from an 
unknown XL user, ZBasic 
3.03 was modified so you can 
create windows large enough to 
use the full screen of the XL. 
Window size is now allowed 
up to 8192x8192 pixels. 

Publisher Wants your 
Macintosh Programs 

Practical Computer Applica- 
tions, Inc. is a software 



publisher looking for quality 
simulations for the Macintosh. 
They are in need of full 
working applications in the area 
of education, entertainment, 
utility and productivity. 

If you have a program that fits 
their needs send a description 
of the program to: .Practical 
Computer Applications, Inc., 
Attention: Product 
development, Champlin, MN 
55316 or call Kim at (612) 427- 
4789 (no connection with 
Zedcor, Inc.) 

What's coming? 

A lot of you have expressed 
dissatisfaction with the 
program editor we provided. 
We're working hard on a new 
editor to replace the EDIT 
WINDOW. The goal is to have 
an editor with boldfaced 
keywords, find and replace 
and other features all using 
standard Macintosh-type 
editing. Look for it around the 
beginning of the year. 

We will also have a SANE 
package that is compatible with 
the 68881 coprocessor. This 
will be an optional package that 
will sell for about $59.95 retail. 

We're also working on a 
compile time optimizer that will 
cut down the runtime size a bit. 

Let us know what you want in 
future versions. ••• 
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ZBASIC 
EQUATIONS 

versus 

BASIC 
EQUATIONS 

The way ZBasic decides 
whether an equation is floating 
point or integer has caused 
some concern among certain 
ZBasic users. The problem 
being that with ZBasic, all 
equations are considered 
integer unless a floating point 
type is specified, such as; #, !, 
decimal point, \ A or any 
scientific function. 

Note that parentheses create a 
sub-expression and that that 
expression is evaluated 
separately from the rest. This 
fact seems to cause the most 
confusion. For example, the 
equation: 

(2.2+2.2)+(l. 1+1.1) 

would return 6 in ZBasic. 
Obviously this not the result 
you are after. Let's look more 
closely at the equation; 

There are actually three 
equations; 

• (2.2+2.2) 

• (1.1+1.1) 

• (2.2+2.2)+( 1.1+1.1) 

ZBasic evaluates the first two 
expressions as Floating point 
since it sees a decimal point in 
each. The problem results in 
the final expression. There is 
nothing there to tell ZBasic at 
compile time that the final result 
is to be considered floating; no 
decimals, not # or ! or\ , so 
ZBasic defaults to integer. To 
fix the problem, the example 
can be restructured in a number 



E#=MC A 2 



of ways: 

2.2+2.2+1.1+1.1 
(2.2+2.2)+l. 1+1.1 
2.2+2.2+(l. 1+1.1) 
(2.2+2.2)+(l.l+l.l)+.0 

This method is utilized to 
maximize program speed. To 
default to floating point would 
slow the program down ten- 
fold. 

We are debating whether to 
force an entire statement to be 
floating point if any floating 
point specifier is discovered 
within that statement. While 
this could result in much 
slower code, it would certainly 
eliminate the confusion. We 
would appreciate your feedback 
about this. ••• 



Disclaimers 



ZBasic 151 is a trademark of Zedcor Inc. Apple 
and Macintosh™ are registered or licensed 
trademarks of Apple Corrputer, Inc. IBM PC, IBM 
PC jr., IBM PC-XT, PC-AT and PC-DOS are 
registered trademarks of International Business 
Machines Corporation. MSBASIC, MS, Xenix 
and MSDOS are registered trademarks of 
Microsoft Corporation. CP/M is a registered 
trademark of Digital Research, Inc. TRS-80, 
Radio Shack, Tandy 2000, Tandy and Tandy 
1 000 are registered trademarks of Tandy 
Corporation. Kayproll,4, 10, 16and286iare 
registered trademarks of Kaypro Corporation. 
Commodore 64 is a trademark of Commodore 
International. Compaq and Deskpro are 
trademarks of Compaq Computers. Panasonic 
Senior and Executive Partners are trademarks of 
Panasonic Industrial Corporation. Data General 
One is a trademark of Data General Corporation, 
Pagemaker is a trademark of Aldus, Inc. We 
apologize for any unintentional omissions. 



BULLETIN 
BOARDS 

Got a bulletin board with a 
ZBasic forum you want 
advertised? Send me the 
information and I'll put it here. 

Do you want Zedcor to have a 
bulletin board for answering 
questions? Let me know. If* 
enough people want it, we'll do 
it. Perhaps a Round Table on 
GEnieorBIX? 

John Gillett has a Macintosh 
Red Ryder™ bulletin board 
called "TIGER'S DEN" on has 
Macintosh. Call; (602) 951- 
4214 and get a password. 
Read "TECHIE STUFF". »• 



USER GROUP 

A number of you have 
expressed an interest in creating 
a ZBasic User Group. I think 
there's a lot to be said for the 
idea. 

This would allow a number of 
folks with a common interest to 
help each other with common 
problems. They could create 
public domain libraries that can 
be shared. 

The group will need a President 
and some sort of supportive 
committee. Zedcor would 
include User Group 
information in this newsletter 
for free and be willing to help 
out as much as possible. 

If you are interested in joining a 
ZBasic Users Group, be sure 
to mark it on the subscription 
form. You will be 
notified. ••• 
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SUBROUTINES 

continued from page one 

Many of you would like a 
public domain library of 
subroutines written in 
ZBasic. We would be 
happy to provide a focal 
point for these utilities. 

We would organize these 
subroutines for you and 
make them available free 
from CompuServe or 
Zedcor direct at our cost. 

Send your routines on a 
diskette in ASCII format 
(SAVE*). Be sure to 
document the routines 
carefully and avoid line 
numbers if your can 
(SAVE*+). This way 
others can use your 
routines in their program 
with less work. Try and 
keep routines less than a 
page, although longer 
programs of value will be 
accepted. 

Send your subroutines and 
program examples to: 

ZBasic Newsletter 

4500 E. Speedway, #22 
Tucson, AZ 85712 



Overseas 
Outlets 



CUSTOMER PROGRAM ANNOUNCEMENTS 

Tbc following programs were written in ZBasic and are available for sale from the authors. If you have programs you wrote with ZBasic 
that you wish to advertise here, send a short description of the program to: Zedcor, Inc, Attention ZBasic newsletter, 4500 E. 
Speedway, Suite 22, Tucson AZ 85712. Programmers with public domain utilities, subroutines of usefulness, or tricks- send them for 
inclusion in future issues (ASCII listing on disk is preferred if more than 20 or 30 lines). Your fellow programmers will be grateful. 

Macintosh™ 

A. H. Nussel, 1606 NW 21st Sl, Gainesville, FL 32605, Musk: Directory Program, $35. 

Peter Bcrmet, 23 Exford Dr, Scarborough ONT. M1P lL5,Post-a-matfc (Postscript staff).? 

Spacetabs, 5215 NJE. Hem Pky, Hillsboro OR 97123, Zdemo, internal use 

Mike Nudd&Julie VonBon, Box 445. Arkansas City. KS 67005, ShopKeeper, $250 

Bob Andrb. 12155 Terrence Ave., Saratoga, CA 95070, Appointment organizer,? 

Bob Andris. Any Plot (creation of Scientific plots and graphs). ? 

John D. Lewis, Rtl4, Box 45, Moore, OK 73165, Books of the Bible-Bible Pursuit, $20. , 

Social Security Administration, Department of Health and Human Services, Suite 409, 845 S 

Figuaro SL, Los Angeles, CA 90017, Various programs for Social Security uses, mt^r^.1 
Investor's Software, (703) 743-2109 or (813) 778-5515, Stock Comparison Report, ? 

Apple® // 

REMs Software, 174 Christopher St, Montclair, NJ 07042, Medical Software, S5.95-J149.95 
Lawrence Hammer, 323 S. Willis, Still wafcr.OK 74074, Cost Accounting: Planning and control.? 
J. Kim Morgan, Brat 367, Melrose, NM 88124, Oil and Gas Appraisal S250, and Charting $250. 
Investor's Software, (703) 743-2109 or (813) 778-5515, Stock Comparison Report, ? 
Douglas Stone, 1 135 E. 24th Ave., Albany OR 97321, Graphlt and Finance, ? 

IBM PC®, MSDOS™ 

McAdams Assoc 109 Spanish Village, #618, Dallas, TX 75248, MergeMate, ? 
Pinetucky Software, Rt 1 , Box 260, Kirbyvule, TX 75956, Weather Watch, $2730 
CECAP Co., 27233 Kane LAnc, Oak Ridge TX 77385-9028, Data-Iog-64 DBMS, $19.95 
Mida Productions, BOX 311, Barrie, ONT MM 4T5, Count Mlda, 3955 
DA Systems, Inc, 1503 E. CampbeU Ave., Campbell, CA95008. DOS-Node Network, ? 
Shannon Assoc, Box 597, Chapel Hll, NC 27514, Language Conversions, $387. 

Converts: Forum to ADA, Jovial to ADA, conversions to C, Dialect conversions. 
Spacelabs, 5215 N£. FJem Pky, Hillsboro OR 97123, Zdemo, internal use 
Schoolware , Inc., Box 546, LaFayette, GA 30728, Attendance and other School programs, ? 
RX. Huffman, 2839 E 49th, St., Tulsa, OK 74105, Duplicate Score Pad (for Bridge), $69 .95 
Digital Logic, 3307 W Cypress, Tampa, FL33609, Easy Base DBMS.S39.95 
Social Security Administration, Department of Health and Human Services, Suite 409, 845 S 

Figuaro St, Los Angeles, CA 90017, Various programs for Social Security uses, internal 
GPC Software Inc., Box 33570, Carson City, NV 89702, Man and Phone Pro, $49.95 
David Marans, 877 NE 195 St, APT 218, Miami, FL 33179, -Pundlf Dog Race Program, ? 
Tejas Software, 1501 N. 2nd St, Mcrkel TX 79536, TextMate, ? 
Investor's Software, (703) 743-2109 or (813) 778-5515, Stock Comparison Report, 7 
Tericomp. Inc., 6611 Paul Revere, Canton MI, 48187, Inventory Control, ? 
L. Brown Buerprises, RT1 , Box 277-C, Denison, TX 75020, Constructions Materials, $300. 
Douglas Stone, 1 135 E. 24th Ave., Albany OR 97321, Graphlt and Finance, ? 
Tom Gilbert, 7127 LaFayene Ave, Kansas City, KS 66109, Zoom Modem Utilities, ? 
REMs Software, 174 Qrristopher St, Montchur, NJ 07042, Medical Software, S5-95-S149.95 
J. Kim Morgan, Box 367, Melrose, NM 88124, OH and Gas Appraisal $250, and Charting $250. 
Tfce&Co., 431 E. Broad St, Columbus, OH 43215, DBase in structure tracer, ? 
IJ Smith, 9795 Rustling Oaks, Baton Rouge, LA 70818, SC-BID for Contractors, Freeware 
CPS, 3090 Oak Circle N, Broomffeld, CO 80O2O 303-469-0557, Printing Estimator, Call 
J.Johnson, Tech Vil L-7 W, Cookevffle, TN 38501, French Curvepolynomlal curve lit, $25 
Delbert Pernod, 1425 Stevenson Dr., Springfield, JL 62703, Church programs, ? 
Warren NG, 6341 PinehavenRd, Oakland, CA 94611, ZFIre Hydraulics-, $99 
Robert Willext, Box 676, Normal IL 61761 , School programs (tardiness etc), ? 
Lawrence Ham m er, 323 S. Willis, Still water.OK 74074, Cost Accounting: Planning and control,? 
Greg Wishart, 1 18 Kings Forest Dr, Hamuton ONT LBT 4J9, Gas Station Construction Set, 7 

CP/M™-80, TRS-80™ 

Stephen Moore, 303-51st st, Des Moines, IA 50312, Catholic Church Mgmnt Syst 2.0, Call 
REMs Software, 174 Christopher St, Montclair, NJ 07042, Medical Software, S5.95-S149.95 
John D. Lewis, Rtl4, Box 45, Moore, OK 73165, Books of the Bible-Bible Pursuit, S20. 
Investor's Software, (703) 743-2109 or (813) 778-5515, Stock Comparison Report, 7 
J. Johnson, Tech Va L-7W, Cookevffle, TN 38501, French Curve (polynomial curve El), S25 



ZBasic is available all over 
the world. Purchase upgrades 
and other versions from the 
following distributors. 

FRANCE (French Version) 
A.B. Soft 

13, rue Lacordaire 

75015 Paris 

Telephone: (1) 45 75 55 66 



BRITAIN 

Tulips Enterprises 

Studio 7, Intec 2 
Basingstoke, Hampshire 
Telephone: (0256) 463754 

SWEDEN (Swedish version) 
Reda Nova 

Vimmerbyvagen 17 B 
590 83 Storebro 
Telephone: (0492) 307 40 



GERMANY (German Lang.) 
Markt and Technik 

Hans Pinsel Strasse 2 
8013 Haar b. (Munich) 
Telephone: (089) 46-13-109 

SWITZERLAND (German ) 
Markt and Technik 

Kollerstxasse 3 

6300 Zug 

Telephone: (042) 41 56 56 



GREECE 
Milonakis Imports 

58 Irakleous St. 176 72 
Kallithea, Athens 
Telephone: (01) 9567348 

NEW ZEALAND 
Comtech Comp Tech. 

3-5 Saleyards Road 
Otahuhu, Auckland 
Telephone: (09) 276-6715 
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Subscribe today! 

This is the only "Z" you will receive free! 



Credit Card Orders Call: 

1-800-482-4567 




□ $19.95 
one year 

□ $37.00 
two years 

Quarterly 
publication 



»«• 



Name 



.Position 



Company, 

Address 

City 



State 



ZIP 



Country, 



Are you interested in the ZBasic User Group?_ 
What version of ZBasic do you own 



Payment Cash [ ] Check [ ] Credit Card [ ] 

Visa, MC AMEX number 

Signature 



_Exp_ 



Mail to: The "Z" Newsletter 

4500 East Speedway, Suite 22 
Tucson, AZ 85712-5305 

(602) 795-3996 
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